(rmail-message-subject-p): Fix typo in string constant.

diff --git a/lisp/mail/rmailsum.el b/lisp/mail/rmailsum.el
index 7159af4e252df3c76c955154a19fa70e4095d158..2ee96247aa03b2c94efd28846e21afadcb95a140 100644 (file)
--- a/lisp/mail/rmailsum.el
+++ b/lisp/mail/rmailsum.el
@@ -105,7 +105,7 @@ SUBJECT is a string of regexps separated by commas."
     (search-forward "\n*** EOOH ***\n")
     (narrow-to-region
      (point)
-     (progn (search-forward (if whole-message "" "\n\n")) (point)))
+     (progn (search-forward (if whole-message "\^_" "\n\n")) (point)))
     (goto-char (point-min))
     (if whole-message (re-search-forward subject nil t)
       (string-match subject (or (mail-fetch-field "Subject") "")) )))